home *** CD-ROM | disk | FTP | other *** search
/ Personal Computer World 2009 February / PCWFEB09.iso / Software / Linux / Kubuntu 8.10 / kubuntu-8.10-desktop-i386.iso / casper / filesystem.squashfs / usr / share / perl / 5.10.0 / integer.pm < prev    next >
Text File  |  2008-07-24  |  172b  |  16 lines

  1. package integer;
  2.  
  3. our $VERSION = '1.00';
  4.  
  5. $integer::hint_bits = 0x1;
  6.  
  7. sub import {
  8.     $^H |= $integer::hint_bits;
  9. }
  10.  
  11. sub unimport {
  12.     $^H &= ~$integer::hint_bits;
  13. }
  14.  
  15. 1;
  16.